/*
 * Copyright (c) 2014 pkzd/1.0, 颜文泽(robin)
 * All rights reserved.
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 *     1 Redistributions of source code must retain the above copyright
 *       notice, this list of conditions and the following disclaimer.
 *     2 Redistributions in binary form must reproduce the above copyright
 *       notice, this list of conditions and the following disclaimer in the
 *       documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS "AS IS" AND ANY
 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR ANY
 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

#include	<asm.h>
#include	<prf.h>
#include	<tty.h>

static void	putint(int x, int b);
static void	putuint(uint x, int b);

static void
putint(int x, int b)
{
	int	a;
	
	if(x < 0){
		putchar('-');
		x = -x;			
	}	
	if(a = x / b)
		putint(a, b);
	putchar("0123456789abcdef"[x % b]);
}

static void
putuint(uint x, int b)
{
	uint	a;

	if(a = x / b)
		putuint(a, b);
	putchar("0123456789abcdef"[x % b]);
}

void
spin(const char *s)
{
	puts(s);
	for( ; ; )
		;
}

void
puts(const char *s)
{
	register const char	*p;

	for(p = s; *p; p++)
		putchar(*p);
}

void
printf(const char *fmt, ...)
{
	uint	*addr;
	register const char	*p;

	addr = (uint *)(&fmt) + 1;
	for(p = fmt; *p; p++){
		switch(*p){
		case '%':
			switch(*++p){
			case 'd':
			case 'i':
				putint(*addr++, 10);
				break;
			case 'x':
			case 'u':
			case 'o':
				putuint(*addr++, *p == 'u' ? 10 : (*p == 'x' ? 16 : 8));
				break;
			case 's':
				puts((uchar *)(*addr++));
				break;
			case 'c':
				putchar(*addr++);
				break;
			case '%':
				putchar(*p);
				break;
			default:
				putchar(*--p);
				break;
			}
			break;	
		default:
			putchar(*p);
			break;
		}	
	}
}
